errRE1  dw  "Error restar enteros (Underflow)" ;32
errRE2  dw  "Error restar enteros (Overflow)"  ;31


;resta de dos numeros entero
;   con control de overflow y underflow
;
;   param1: sumando1
;   param2: sumando2
;Deja en la punta del SP el resultado!!!
restaE proc near
    push bp
    mov bp,sp
    push ax
    
    mov ax, [bp+4]
    sub [bp+6],ax
    jno resEok
    jns errreO
    push offset errRE2
    push 31
    call writeSTR
    jmp fin

errreO:
    push offset errRE1
    push 32
    call writeSTR
    jmp fin
resEok:
    ;fin resta
    pop ax
    pop bp
    ret 2
restaE endp
;Fin resta entera

